
#include <nmds.h>

#ifdef __EXPORT__
#define extern __EXPORT__
#endif
extern boolean CSgetA_INDEX(PropAccessP pac);
#undef extern

boolean CSgetA_INDEX(PropAccessP pac)
{
	AtomP ap;
	long idx = 0;
	CS_WALK_ATOMS(*pac,ap) {
		PV_INT(*pac,ap) = idx++;
	}
	return TRUE;
}
